home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / Tcl-Tk 8.0 / Pre-installed version / tcl8.0 / mac / MW_TclHeader.pch < prev    next >
Encoding:
Text File  |  1997-08-15  |  2.6 KB  |  102 lines  |  [TEXT/CWIE]
  1. /*
  2.  * MW_TclHeader.pch --
  3.  *
  4.  *  This file is the source for a pre-compilied header that gets used
  5.  *  for all files in the Tcl projects.  This make compilies go a bit
  6.  *  faster.  This file is only intended to be used in the MetroWerks
  7.  *  CodeWarrior environment.  It essentially acts as a place to set 
  8.  *  compiler flags.  See MetroWerks documention for more details.
  9.  *
  10.  * Copyright (c) 1995-1997 Sun Microsystems, Inc.
  11.  *
  12.  * See the file "license.terms" for information on usage and redistribution
  13.  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  14.  *
  15.  * SCCS: @(#) MW_TclHeader.pch 1.24 97/07/30 16:44:37
  16.  */
  17.  
  18. /*
  19.  * To use the compilied header you need to set the "Prefix file" in
  20.  * the "C/C++ Language" preference panel to point to the created
  21.  * compilied header.  The name of the header depends on the
  22.  * architecture we are compiling for (see the code below).  For
  23.  * example, for a 68k app the prefix file should be: MW_TclHeader68K.
  24.  */
  25. #if __POWERPC__
  26. #pragma precompile_target "MW_TclHeaderPPC"
  27. #elif __CFM68K__
  28. #pragma precompile_target "MW_TclHeaderCFM68K"
  29. #else
  30. #pragma precompile_target "MW_TclHeader68K"
  31. #endif
  32.  
  33. /*
  34.  * Macintosh Tcl must be compiled with certain compiler options to
  35.  * ensure that it will work correctly.  The following pragmas are 
  36.  * used to ensure that those options are set correctly.  An error
  37.  * will occur at compile time if they are not set correctly.
  38.  */
  39.  
  40. #if !__option(enumsalwaysint)
  41. #error Tcl requires the Metrowerks setting "Enums always ints".
  42. #endif
  43.  
  44. #if !defined(__POWERPC__)
  45. #if !__option(far_data)
  46. #error Tcl requires the Metrowerks setting "Far data".
  47. #endif
  48. #endif
  49.  
  50. #if !defined(__POWERPC__)
  51. #if !__option(fourbyteints)
  52. #error Tcl requires the Metrowerks setting "4 byte ints".
  53. #endif
  54. #endif
  55.  
  56. #if !defined(__POWERPC__)
  57. #if !__option(IEEEdoubles)
  58. #error Tcl requires the Metrowerks setting "8 byte doubles".
  59. #endif
  60. #endif
  61.  
  62. /*
  63.  * The define is used most everywhere to tell Tcl (or any Tcl
  64.  * extensions) that we are compiling for the Macintosh platform.
  65.  */
  66.  
  67. #define MAC_TCL
  68.  
  69. /*
  70.  * The following defines control the behavior of the Macintosh
  71.  * Universial Headers.
  72.  */
  73.  
  74. #define SystemSevenOrLater 1
  75. #define STRICT_CONTROLS 1
  76. #define STRICT_WINDOWS  1
  77.  
  78. /*
  79.  * Define the following symbol if you want
  80.  * comprehensive debugging turned on.
  81.  */
  82.  
  83. /* #define TCL_DEBUG */
  84.  
  85. #ifdef TCL_DEBUG
  86. #   define TCL_MEM_DEBUG
  87. #   define TCL_TEST
  88. #endif
  89.  
  90. /*
  91.  * Place any includes below that will are needed by the majority of the
  92.  * and is OK to be in any file in the system.  The pragma's are used
  93.  * to control what functions are exported in the Tcl shared library.
  94.  */
  95.  
  96. #pragma export on
  97. #include "tcl.h"
  98. #include "tclMac.h"
  99. #include "tclInt.h"
  100. #pragma export off
  101.  
  102.